home *** CD-ROM | disk | FTP | other *** search
/ Atari Mega Archive 1 / Atari Mega Archive - Volume 1.iso / language / isetl.arc / slice.t < prev    next >
Text File  |  1987-08-20  |  418b  |  45 lines
  1.    x:= [10..30];
  2.    y:= x;
  3.  
  4.    x(10..15) := [];
  5. x;
  6.  
  7.    x:= y;
  8.    x(10..15) := [1..10];
  9. x;
  10.  
  11.    x:= y;
  12.    x(10..15)(3) := 50;
  13. x;
  14.  
  15.    x := [1..20];
  16.    y := x;
  17. x;
  18.  
  19.    x(10..15) := [];
  20. x;
  21.  
  22.    x := y;
  23.    x(10..15) := [50..60];
  24. x;
  25.  
  26.    x := y;
  27.    x(10..15)(3) := 45;
  28. x;
  29.  
  30.    x := y;
  31.    x(10..15)(8) := 70;
  32. x;
  33.  
  34.    x := [1,2,3,4,OM,OM,OM,8,9,10];
  35.    y := x;
  36. x;
  37. x(4..7);
  38.    x(4..7)(2) := 17;
  39. x;
  40.  
  41.    x := y;
  42.    x(6..7) := [1];
  43. x;
  44.  
  45.